home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Revista CD Expert 25
/
CD Expert nº 25.iso
/
WARGASM
/
data1.cab
/
Program_Run_Time_Files
/
didcfg.exe
/
0
/
RCDATA
/
TFORM1
/
TFORM1.txt
Wrap
Text File
|
1998-10-14
|
9KB
|
367 lines
object Form1: TForm1
Left = 471
Top = 389
BorderIcons = []
BorderStyle = bsDialog
Caption = 'DID Configuration Tool'
ClientHeight = 350
ClientWidth = 575
ParentFont = True
Position = poScreenCenter
ShowHint = True
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object TabControl: TPageControl
Left = 8
Top = 8
Width = 561
Height = 297
ActivePage = Video
TabOrder = 0
OnChange = TabControlChange
object Video: TTabSheet
Caption = 'Video'
object Device: TGroupBox
Left = 8
Top = 8
Width = 369
Height = 105
Caption = 'Device'
TabOrder = 0
object ListBox1: TListBox
Left = 16
Top = 24
Width = 337
Height = 65
Hint = 'Select the device to be used.'
ItemHeight = 13
TabOrder = 0
OnClick = ListBox1Click
end
end
object Mode: TGroupBox
Left = 392
Top = 8
Width = 153
Height = 73
Caption = 'Mode'
TabOrder = 1
object ComboBox1: TComboBox
Left = 16
Top = 24
Width = 121
Height = 21
Hint = 'Select the preferred video mode.'
Style = csDropDownList
ItemHeight = 13
TabOrder = 0
OnChange = ComboBox1Change
end
object CheckBox3: TCheckBox
Left = 16
Top = 48
Width = 97
Height = 17
Hint =
'Toggles windowed / fullscreen display. This option is not availa' +
'ble on all video hardware.'
Caption = 'Windowed'
TabOrder = 1
Visible = False
OnClick = CheckBox3Click
end
end
object GroupBox2: TGroupBox
Left = 392
Top = 120
Width = 153
Height = 137
Caption = 'Miscellaneous'
TabOrder = 2
Visible = False
object CheckBox4: TCheckBox
Left = 16
Top = 80
Width = 73
Height = 17
Hint = 'When running in 16bpp modes, dithering reduces colour banding.'
Caption = 'Dither'
State = cbChecked
TabOrder = 0
end
object RadioGroup3: TRadioGroup
Left = 16
Top = 24
Width = 121
Height = 49
Hint = 'Select the preferred type of fog.'
Caption = 'Fog'
ItemIndex = 1
Items.Strings = (
'None'
'Vertex')
TabOrder = 1
end
object vsync: TCheckBox
Left = 16
Top = 96
Width = 89
Height = 17
Hint = 'Enables/disables waiting for v-sync.'
Caption = 'V-sync'
TabOrder = 2
end
end
object GroupBox1: TGroupBox
Left = 8
Top = 120
Width = 369
Height = 137
Caption = 'Texture'
TabOrder = 3
Visible = False
object RadioGroup1: TRadioGroup
Left = 24
Top = 24
Width = 105
Height = 97
Hint =
'Selects default texture format. Some video cards perform better ' +
'with specific formats.'
Caption = 'Default Format'
ItemIndex = 0
Items.Strings = (
'4 bit palettised'
'8 bit palettised'
'16 bit RGB'
'32 bit RGB')
TabOrder = 0
OnClick = RadioGroup1Click
end
object RadioGroup2: TRadioGroup
Left = 144
Top = 24
Width = 105
Height = 97
Hint =
'Selects texture resolution. Lower resolution requires less video' +
' memory.'
Caption = 'Resolution'
ItemIndex = 0
Items.Strings = (
'High'
'Medium')
TabOrder = 1
end
object CheckBox1: TCheckBox
Left = 264
Top = 32
Width = 89
Height = 17
Hint = 'Enables/disables blinear filtering (smoothing) or texturemaps.'
Caption = 'Bilinear filter'
State = cbChecked
TabOrder = 2
end
object Mipmap: TCheckBox
Left = 264
Top = 48
Width = 81
Height = 17
Hint = 'Enables/disables mipmapping.'
Caption = 'Mip-map'
TabOrder = 3
OnClick = MipmapClick
end
object cboxDynamic: TCheckBox
Left = 264
Top = 64
Width = 81
Height = 17
Hint = 'Enables/disables hardware rendering to texturemaps.'
Caption = 'Dynamic'
TabOrder = 4
end
object compress: TCheckBox
Left = 264
Top = 80
Width = 81
Height = 17
Hint = 'Enables/disables use of compressed textures.'
Caption = 'Compress'
TabOrder = 5
OnClick = compressClick
end
end
object VideoAdvanced: TButton
Left = 392
Top = 88
Width = 89
Height = 25
Hint = 'Displays advanced configuration settings'
Caption = 'Advanced >>>'
TabOrder = 4
OnClick = VideoAdvancedClick
end
end
object Audio: TTabSheet
Caption = 'Audio'
object AudioDeviceGroupBox: TGroupBox
Left = 8
Top = 8
Width = 369
Height = 105
Caption = 'Digital Audio Device'
TabOrder = 0
object AudioDeviceListBox: TListBox
Left = 16
Top = 24
Width = 337
Height = 65
Hint = 'Select the audio device to be used.'
ItemHeight = 13
TabOrder = 0
end
end
object GroupBox4: TGroupBox
Left = 8
Top = 120
Width = 209
Height = 137
Caption = 'CD Volume Select'
TabOrder = 1
Visible = False
object Label2: TLabel
Left = 16
Top = 24
Width = 89
Height = 13
Caption = 'Mixer device name'
end
object Label3: TLabel
Left = 16
Top = 72
Width = 87
Height = 13
Caption = 'Mixer device slider'
end
object MixerLines: TComboBox
Left = 16
Top = 40
Width = 145
Height = 21
Hint = 'Select the mixer slider which controls CD audio'
Style = csDropDownList
ItemHeight = 13
TabOrder = 0
end
object TrackBar1: TTrackBar
Left = 8
Top = 88
Width = 161
Height = 33
Hint = 'Moving this slider should change the CD volume'
Max = 127
Orientation = trHorizontal
PageSize = 1
Frequency = 20
Position = 0
SelEnd = 0
SelStart = 0
TabOrder = 1
TickMarks = tmBottomRight
TickStyle = tsAuto
OnChange = TrackBar1Change
end
object Button4: TButton
Left = 168
Top = 40
Width = 25
Height = 25
Hint = 'Launches Volume Control'
Caption = '>>>'
TabOrder = 2
OnClick = Button4Click
end
end
object AudioAdvanced: TButton
Left = 392
Top = 88
Width = 89
Height = 25
Hint = 'Displays advanced configuration settings'
Caption = 'Advanced >>>'
TabOrder = 2
OnClick = AudioAdvancedClick
end
end
object Comms: TTabSheet
Caption = 'Comms'
TabVisible = False
end
object Input: TTabSheet
Caption = 'Input'
TabVisible = False
end
end
object BottomBar: TPanel
Left = 8
Top = 304
Width = 561
Height = 41
BevelOuter = bvNone
TabOrder = 1
object Label1: TLabel
Left = 8
Top = 16
Width = 55
Height = 13
Caption = 'Application:'
end
object ComboBox2: TComboBox
Left = 72
Top = 12
Width = 217
Height = 21
Hint = 'Application to which the configuration applies.'
Style = csDropDownList
ItemHeight = 13
TabOrder = 0
OnChange = ComboBox2Change
end
object Button1: TButton
Left = 320
Top = 10
Width = 73
Height = 25
Hint = 'Exit and save configuration.'
Caption = 'OK'
Default = True
TabOrder = 1
OnClick = Button1Click
end
object Button2: TButton
Left = 400
Top = 10
Width = 73
Height = 25
Hint = 'Exit and discard changes to configuration.'
Cancel = True
Caption = 'Cancel'
TabOrder = 2
OnClick = Button2Click
end
object Button3: TButton
Left = 480
Top = 10
Width = 73
Height = 25
Hint = 'Save changes to application configuration but do not exit.'
Caption = 'Apply'
TabOrder = 3
OnClick = Button3Click
end
end
end